napisane v Turbo Basicu